home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD Fun House 1
/
CD Fun House (Wayzata Technology).iso
/
•The School House•
/
I Ching •••
/
I Ching еее.rsrc
/
CODE_2_•Init.txt
< prev
next >
Wrap
Text File
|
1988-10-21
|
10KB
|
196 lines
# near model CODE resource
# jump table entries: 40-40 (1 of them)
export_5:
00000000 48E7 FFF0 movem.l -[A7], D0,D1,D2,D3,D4,D5,D6,D7,A0,A1,A2,A3
00000004 4247 clr.w D7
00000006 41FA 00C0 lea.l A0, [PC + 0xC0 /* 000000C8, value 0x240, cstring "" */]
0000000A 2218 move.l D1, [A0]+
0000000C 6F00 00A6 ble +0xA8 /* 000000B4 */
00000010 2A18 move.l D5, [A0]+
00000012 6604 bne +0x6 /* 00000018 */
00000014 2A0D move.l D5, A5
00000016 9A81 sub.l D5, D1
label00000018:
00000018 2645 movea.l A3, D5
0000001A 244B movea.l A2, A3
0000001C E281 asr D1, 1
0000001E 6002 bra +0x4 /* 00000022 */
label00000020:
00000020 425A clr.w [A2]+
label00000022:
00000022 51C9 FFFC dbf D1, -0x6 /* 00000020 */
00000026 3018 move.w D0, [A0]+
00000028 3E18 move.w D7, [A0]+
0000002A 6000 0084 bra +0x86 /* 000000B0 */
label0000002E:
0000002E 7800 moveq.l D4, 0x00
00000030 1818 move.b D4, [A0]+
00000032 2204 move.l D1, D4
00000034 0201 000F andi.b D1, 0xF
00000038 0804 0004 btst.b D4, 0x4
0000003C 670E beq +0x10 /* 0000004C */
0000003E E141 asl D1.w, 8
00000040 1218 move.b D1, [A0]+
00000042 0881 000B bclr.b D1, 0xB
00000046 6704 beq +0x6 /* 0000004C */
00000048 E181 asl D1, 8
0000004A 1218 move.b D1, [A0]+
label0000004C:
0000004C 7401 moveq.l D2, 0x01
0000004E 0804 0007 btst.b D4, 0x7
00000052 6716 beq +0x18 /* 0000006A */
00000054 1418 move.b D2, [A0]+
00000056 0882 0007 bclr.b D2, 0x7
0000005A 670E beq +0x10 /* 0000006A */
0000005C E142 asl D2.w, 8
0000005E 1418 move.b D2, [A0]+
00000060 0882 000E bclr.b D2, 0xE
00000064 6704 beq +0x6 /* 0000006A */
00000066 E182 asl D2, 8
00000068 1418 move.b D2, [A0]+
label0000006A:
0000006A 7C02 moveq.l D6, 0x02
0000006C 4EBA 004C jsr [PC + 0x4C /* 000000BA */]
00000070 0885 000F bclr.b D5, 0xF
00000074 6704 beq +0x6 /* 0000007A */
00000076 E185 asl D5, 8
00000078 1A18 move.b D5, [A0]+
label0000007A:
0000007A 43F3 5800 lea.l A1, [A3 + D5]
0000007E 2449 movea.l A2, A1
00000080 0804 0005 btst.b D4, 0x5
00000084 671C beq +0x1E /* 000000A2 */
00000086 2C01 move.l D6, D1
00000088 4EBA 0030 jsr [PC + 0x30 /* 000000BA */]
0000008C 0C41 0002 cmpi.w D1, 0x2
00000090 6706 beq +0x8 /* 00000098 */
00000092 6D08 blt +0xA /* 0000009C */
00000094 DB92 add.l [A2], D5
00000096 600E bra +0x10 /* 000000A6 */
label00000098:
00000098 DB52 add.w [A2], D5
0000009A 600A bra +0xC /* 000000A6 */
label0000009C:
0000009C DB12 add.b [A2], D5
0000009E 6006 bra +0x8 /* 000000A6 */
label000000A0:
000000A0 12D8 move.b [A1]+, [A0]+
label000000A2:
000000A2 51C9 FFFC dbf D1, -0x6 /* 000000A0 */
label000000A6:
000000A6 0804 0006 btst.b D4, 0x6
000000AA 6704 beq +0x6 /* 000000B0 */
000000AC 260D move.l D3, A5
000000AE D792 add.l [A2], D3
label000000B0:
000000B0 51C8 FF7C dbf D0, -0x86 /* 0000002E */
label000000B4:
000000B4 4CDF 0FFF movem.l D0,D1,D2,D3,D4,D5,D6,D7,A0,A1,A2,A3, [A7]+
000000B8 4E75 rts
fn000000BA:
000000BA 7A00 moveq.l D5, 0x00
000000BC 6004 bra +0x6 /* 000000C2 */
label000000BE:
000000BE E18D lsl D5, 8
000000C0 1A18 move.b D5, [A0]+
label000000C2:
000000C2 51CE FFFA dbf D6, -0x8 /* 000000BE */
000000C6 4E75 rts
000000C8 0000 0240 ori.b D0, 0x40 /* '@' */
000000CC 0000 0000 ori.b D0, 0x0
000000D0 000B 0000 ori.b A3, 0x0
000000D4 0300 btst D0, D1
000000D6 0070 4F4B 0300 ori.w [A0 + <<invalid base displacement size>> + D0 * 2], 0x4F4B /* 'OK' */
000000DC 0440 0F80 subi.w D0, 0xF80
000000E0 0300 btst D0, D1
000000E2 0E3F FF80 .invalid.b <<invalid special address>>, 0x80 // invalid immediate operation
000000E6 0A00 1854 xori.b D0, 0x54 /* 'T' */
000000EA 6865 bvc +0x67 /* 00000151 */
000000EC 2049 movea.l A0, A1
000000EE 6D61 blt +0x63 /* 00000151 */
000000F0 6765 beq +0x67 /* 00000157 */
000000F2 3A0E move.w D5, A6
000000F4 0024 5468 ori.b -[A4], 0x68 /* 'h' */
000000F8 6520 bcs +0x22 /* 0000011A */
000000FA 4A75 6467 tst.w [A5 + D6.w * 4 + 0x67]
000000FE 656D bcs +0x6F /* 0000016D */
00000100 656E bcs +0x70 /* 00000170 */
00000102 743A moveq.l D2, 0x3A
00000104 107F movea.b A0, <<invalid special address>>
00000106 0065 0200 ori.w -[A5], 0x200
0000010A 1800 move.b D4, D0
0000010C 0700 btst D0, D3
0000010E 1300 move.b -[A1], D0
00000110 0F00 btst D0, D7
00000112 2400 move.l D2, D0
00000114 2E00 move.l D7, D0
00000116 0B00 btst D0, D5
00000118 1000 move.b D0, D0
label0000011A:
0000011A 3300 move.w -[A1], D0
0000011C 2800 move.l D4, D0
0000011E 3600 move.w D3, D0
00000120 3E00 move.w D7, D0
00000122 3700 move.w -[A3], D0
00000124 2000 move.l D0, D0
00000126 2200 move.l D1, D0
00000128 0800 0300 btst.b D0, 0x0
0000012C 1D00 move.b -[A6], D0
0000012E 3C00 move.w D6, D0
00000130 2700 move.l -[A3], D0
00000132 3F00 move.w -[A7], D0
00000134 3000 move.w D0, D0
00000136 0500 btst D0, D2
00000138 2D00 move.l -[A6], D0
0000013A 1100 move.b -[A0], D0
0000013C 2F00 move.l -[A7], D0
0000013E 3A00 move.w D5, D0
00000140 1F00 move.b -[A7], D0
00000142 3100 move.w -[A0], D0
00000144 1C00 move.b D6, D0
00000146 2B00 move.l -[A5], D0
00000148 1700 move.b -[A3], D0
0000014A 1B00 move.b -[A5], D0
0000014C 0400 2900 subi.b D0, 0x0
00000150 3400 move.w D2, D0
00000152 1600 move.b D3, D0
00000154 1200 move.b D1, D0
00000156 1A00 move.b D5, D0
00000158 2300 move.l -[A1], D0
0000015A 1500 move.b -[A2], D0
0000015C 4000 negx.b D0
0000015E 2600 move.l D3, D0
00000160 3800 move.w D4, D0
00000162 1E00 move.b D7, D0
00000164 3200 move.w D1, D0
00000166 0E00 1400 .invalid.b D0, 0x0 // invalid immediate operation
0000016A 2A00 move.l D5, D0
0000016C 3B00 move.w -[A5], D0
0000016E 3D00 move.w -[A6], D0
label00000170:
00000170 3500 move.w -[A2], D0
00000172 2500 move.l -[A2], D0
00000174 3900 move.w -[A4], D0
00000176 0900 btst D0, D4
00000178 0C00 1900 cmpi.b D0, 0x0
0000017C 0600 0A00 addi.b D0, 0x0
00000180 2100 move.l -[A0], D0
00000182 0D00 btst D0, D6
00000184 2C00 move.l D6, D0
00000186 0110 btst [A0], D0
00000188 1A02 move.b D5, D2
0000018A 0853 4800 bchg.b [A3], 0x0
0000018E 0000 00FF ori.b D0, 0xFF
00000192 FFFF .invalid <<F/7/7>>
00000194 72FF moveq.l D1, 0xFFFFFFFF
00000196 FFFF .invalid <<F/7/7>>
00000198 7A81 moveq.l D5, 0xFFFFFF81
0000019A 0000 0000 ori.b D0, 0x0
0000019E 0000 00FF ori.b D0, 0xFF
000001A2 FFFF .invalid <<F/7/7>>
000001A4 7E60 moveq.l D7, 0x60
000001A6 020E 6002 andi.b A6, 0x2
000001AA 1260 movea.b A1, -[A0]
000001AC 021E 0102 andi.b [A6]+, 0x2
000001B0 3F01 move.w -[A7], D1